home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 5-Fonts & Software / Demo Software / RagTime Demo / Printer / L100_425.PPD < prev    next >
Text File  |  1989-04-14  |  13KB  |  367 lines
  1. *% Adobe Systems PostScript(R) Printer Description File
  2. *% For "Linotype" version 42.5
  3. *% Produced by GetAPD.ps" with some hand editing
  4. *%
  5. *% Copyright 1988, 1989 Adobe Systems Incorporated.  All Rights Reserved.
  6. *% Permission is granted for redistribution of this file as
  7. *% long as this copyright notice is intact and the contents
  8. *% of the file is not altered in any way from its original form.
  9. *%
  10. *% The byte count of this file should be exactly 012763 or 013129
  11. *% depending on the filesystem it resides in.
  12. *%
  13. *% Date: 4/6/89
  14. *FormatVersion: "3.0"
  15. *FileVersion: "2.0"
  16. *LanguageVersion: English
  17.  
  18. *Product: "(Linotype)"
  19. *PSVersion: "(42.5) 0"
  20. *NickName: "Linotronic 100 v42.5"
  21.  
  22. *% General Information and Defaults ===============
  23. *FreeVM: "175500"
  24. *ColorDevice: False
  25. *VariablePaperSize: True
  26.  
  27. *FileSystem: True
  28. *?FileSystem: "
  29.   statusdict begin diskstatus end
  30.   exch pop 0 eq {(False)} {(True)} ifelse = flush
  31. "
  32. *End
  33. *Password: "0"
  34. *ExitServer: "
  35.   count 0 eq {  % is the password on the stack?
  36.     true 
  37.   }{
  38.     dup    % potential password
  39.     statusdict begin checkpassword end not
  40.   } ifelse 
  41.   {  %  if no password or not valid 
  42.     (WARNING : Cannot perform the exitserver command.) = 
  43.     (Password supplied is not valid.) = 
  44.     (Please contact the author of this software.) = flush
  45.     quit
  46.   } if 
  47.   serverdict begin exitserver
  48. "
  49. *End
  50.  
  51. *Reset: "
  52.   count 0 eq {  % is the password on the stack?
  53.     true 
  54.   }{
  55.     dup    % potential password
  56.     statusdict begin checkpassword end not
  57.   } ifelse 
  58.   {  %  if no password or not valid 
  59.     (WARNING : Cannot reset printer.) = 
  60.     (Password supplied is not valid.) = 
  61.     (Please contact the author of this software.) = flush
  62.     quit
  63.   } if 
  64.   serverdict begin exitserver
  65.   systemdict /quit get exec
  66.   (WARNING : Printer Reset Failed.) = flush
  67. "
  68. *End
  69.  
  70. *DefaultResolution: 1270dpi
  71. *% On the L100 v42.5, there is no mechanism whereby the PostScript
  72. *% controller can set the resolution of the machine.
  73. *?Resolution: "
  74. save
  75.   statusdict begin resolution end
  76.   128 string cvs print(dpi)= flush
  77. restore
  78. "
  79. *End
  80.  
  81. *% Halftone Information ===============
  82. *ScreenFreq: "90.0"
  83. *ScreenAngle: "45.0"
  84. *DefaultScreenProc: Dot
  85. *ScreenProc Dot: "
  86. {abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1
  87. sub }{dup mul exch dup mul add 1 exch sub }ifelse }
  88. "
  89. *End
  90. *ScreenProc Line: "{ pop }"
  91.  
  92. *DefaultTransfer: Null
  93. *Transfer Null: "{ }"
  94. *Transfer Null.Inverse: "{ 1 exch sub }"
  95.  
  96. *% Paper Handling ===================
  97.  
  98. *% Use these entries to set paper size most of the time, unless there is
  99. *% specific reason to use PageRegion or PaperTray.
  100. *DefaultPageSize: Letter
  101. *PageSize Letter: "letter"
  102. *PageSize Legal: "legal"
  103. *PageSize Note: "note"
  104. *PageSize Ledger: "ledger"
  105. *PageSize Tabloid: "11x17"
  106. *PageSize A4: "a4"
  107. *PageSize A5: "a5"
  108. *PageSize B5: "b5"
  109. *PageSize A5.Transverse: "A5"
  110. *PageSize B5.Transverse: "B5"
  111. *PageSize Letter.Transverse: "Letter"
  112. *?PageSize: "
  113. save
  114.     /d0 5 dict def d0 begin    
  115.       /420_596 (A5.Transverse) def
  116.       /499_709 (B5.Transverse) def
  117.       /596_840 (A4.Transverse) def
  118.       /612_792 (Letter.Transverse) def
  119.       /1224_792    (Ledger) def
  120.     end
  121.     /d1 7 dict def d1 begin    
  122.       /596_420 (A5) def
  123.       /709_499 (B5) def
  124.       /792_612 (Letter) def
  125.       /842_596 (A4)    def
  126.       /1008_612    (Legal)    def
  127.       /1191_840 (A3)   def
  128.       /1224_792    (Tabloid) def
  129.     end
  130.     statusdict begin pageparams end
  131.     4 1 roll pop
  132.     /high exch 10 string cvs dup length /hlen exch def def
  133.     /wide exch 10 string cvs def
  134.     /key hlen 1 add wide length add string def
  135.     key 0 high putinterval
  136.     key hlen (_) putinterval
  137.     key hlen 1 add wide putinterval
  138.     0 eq{d0}{d1}ifelse
  139.     key cvn{get}stopped{(Unknown)}if
  140.     = flush
  141. restore
  142. "
  143. *End
  144.  
  145. *% Default Paper Handling Features
  146. *% Because the Linotronics are roll-fed machines, most of these features
  147. *% have values of "None".  None of them have related invocation keywords.
  148. *DefaultPaperTray: None
  149. *DefaultOutputBin: Upper
  150. *DefaultInputSlot: None
  151. *DefaultManualFeed: None
  152. *DefaultOutputOrder: Normal
  153. *DefaultCollator: None
  154. *DefaultSorter: None
  155. *DefaultDuplex: None
  156.  
  157. *% The following entries provide information about specific paper keywords.
  158. *DefaultImageableArea: Letter
  159. *ImageableArea Letter: "0 1 613 792"
  160. *ImageableArea Legal: "0 1 613 1008"
  161. *ImageableArea Note: "0 1 613 792"
  162. *ImageableArea Ledger: "0 0 1223 792"
  163. *ImageableArea Tabloid: "0 1 792 1224"
  164. *ImageableArea A4: "0 1 596 842"
  165. *ImageableArea A5: "0 1 420 596 "
  166. *ImageableArea B5: "0 1 500 709 "
  167. *ImageableArea Letter.Transverse: "0 0 611 792"
  168. *ImageableArea A4.Transverse: "0 0 595 841"
  169. *ImageableArea A5.Transverse: "0 0 419 596"
  170. *ImageableArea B5.Transverse: "0 0 498 709"
  171. *?ImageableArea: "
  172.  save /cvp { cvi (            ) cvs print ( ) print } bind def
  173.   newpath clippath pathbbox
  174.   4 -2 roll exch 2 {ceiling cvp} repeat
  175.   exch 2 {floor cvp} repeat flush
  176.  restore
  177. "
  178. *End
  179.  
  180. *% These provide the physical dimensions of the paper (by keyword)
  181. *DefaultPaperDimension: Letter
  182. *PaperDimension Letter: "612 792"
  183. *PaperDimension Legal: "612 1008"
  184. *PaperDimension Note: "612 792"
  185. *PaperDimension Ledger: "1224 792"
  186. *PaperDimension Tabloid: "792 1224"
  187. *PaperDimension A4: "595 842"
  188. *PaperDimension A5: "420 595"
  189. *PaperDimension B5: "516 729"
  190. *PaperDimension A5.Transverse: "595 420"
  191. *PaperDimension B5.Transverse: "729 516"
  192. *PaperDimension Letter.Transverse: "792 612"
  193.  
  194. *% Font Information =====================
  195.  
  196. *DefaultFont: Courier
  197. *Font Courier: Standard "(001.000)"
  198. *Font Courier-Bold: Standard "(001.000)"
  199. *Font Courier-BoldOblique: Standard "(001.000)"
  200. *Font Courier-Oblique: Standard "(001.000)"
  201. *Font Helvetica: Standard "(001.000)"
  202. *Font Helvetica-Bold: Standard "(001.000)"
  203. *Font Helvetica-BoldOblique: Standard "(001.000)"
  204. *Font Helvetica-Oblique: Standard "(001.000)"
  205. *Font Symbol: Special "(001.001)"
  206. *Font Times-Bold: Standard "(001.000)"
  207. *Font Times-BoldItalic: Standard "(001.000)"
  208. *Font Times-Italic: Standard "(001.000)"
  209. *Font Times-Roman: Standard "(001.000)"
  210. *?FontQuery: "
  211. save  4 dict begin /sv exch def
  212. /str (fonts/                              ) def
  213. /st2 128 string def
  214. {
  215.   count 0 gt {
  216.     dup st2 cvs (/) print print (:) print
  217.     dup FontDirectory exch known {pop (Yes)}{
  218.      str exch st2 cvs dup length /len exch def
  219.      6 exch putinterval str 0 len 6 add getinterval mark exch
  220.      { } st2 filenameforall counttomark 0 gt {
  221.       cleartomark (Yes)}{cleartomark (No)}ifelse
  222.     }ifelse = flush
  223.   }{ exit } ifelse
  224. } bind loop
  225. (*) = flush
  226. sv end restore
  227. "
  228. *End
  229.  
  230. *?FontList: "
  231. save  2 dict begin /sv exch def
  232. /str 128 string def
  233. FontDirectory { pop == } bind forall flush
  234. /filenameforall where { 
  235.  pop save (fonts/*) { 
  236.   dup length 6 sub 6 exch getinterval cvn == 
  237.  } bind str filenameforall flush restore
  238. } if 
  239. (*) = flush
  240. sv end restore
  241. "
  242. *End
  243.  
  244. *% Printer Messages (verbatim from printer):
  245. *Message: "%%[ exitserver: permanent state may be changed ]%%"
  246. *Message: "%%[ Flushing: rest of job (to end-of-file) will be ignored ]%%"
  247. *Message: "\FontName\ not found, using Courier"
  248.  
  249. *% Status (format: %%[ status: <one of these> ]%% )
  250. *Status: "idle"
  251. *Status: "busy"
  252. *Status: "waiting"
  253. *Status: "printing"
  254. *Status: "warming up"
  255. *Status: "PrinterError: recorder not responding"
  256. *Status: "PrinterError: recorder offline or out of film"
  257. *Status: "PrinterError: page too large at current resolution"
  258.  
  259. *% Input Sources (format: %%[ status: <stat>; source: <one of these> ]%% )
  260. *Source: "serial9"
  261. *Source: "serial25"
  262. *Source: "AppleTalk"
  263. *Source: "Centronics"
  264.  
  265. *% Printer Error (format: %%[ PrinterError: <one of these> ]%%)
  266. *PrinterError: "recorder not responding"
  267. *PrinterError: "recorder offline or out of film"
  268. *PrinterError: "page too large at current resolution"
  269.  
  270. *%DeviceAdjustMatrix: "[1 0 0 1 0 0]"
  271.  
  272. *% Color Separation Information =====================
  273.  
  274. *DefaultColorSep: ProcessBlack.128lpi.1270dpi/128 lpi / 1270 dpi
  275.  
  276. *InkName: ProcessBlack/Process Black
  277. *InkName: CustomColor/Custom Color
  278. *InkName: ProcessCyan/Process Cyan
  279. *InkName: ProcessMagenta/Process Magenta
  280. *InkName: ProcessYellow/Process Yellow
  281.  
  282. *% For 90 lpi / 635 dpi (5,5,2,6,6,2,20/3,0) ===============================
  283.  
  284. *ColorSepScreenAngle ProcessBlack.90lpi.635dpi/90 lpi / 635 dpi: "45.0"
  285. *ColorSepScreenAngle CustomColor.90lpi.635dpi/90 lpi / 635 dpi: "45.0"
  286. *ColorSepScreenAngle ProcessCyan.90lpi.635dpi/90 lpi / 635 dpi: "71.5651"
  287. *ColorSepScreenAngle ProcessMagenta.90lpi.635dpi/90 lpi / 635 dpi: "18.4349"
  288. *ColorSepScreenAngle ProcessYellow.90lpi.635dpi/90 lpi / 635 dpi: "0.0"
  289.  
  290. *ColorSepScreenFreq ProcessBlack.90lpi.635dpi/90 lpi / 635 dpi: "89.8026"
  291. *ColorSepScreenFreq CustomColor.90lpi.635dpi/90 lpi / 635 dpi: "89.8026"
  292. *ColorSepScreenFreq ProcessCyan.90lpi.635dpi/90 lpi / 635 dpi: "100.402"
  293. *ColorSepScreenFreq ProcessMagenta.90lpi.635dpi/90 lpi / 635 dpi: "100.402"
  294. *ColorSepScreenFreq ProcessYellow.90lpi.635dpi/90 lpi / 635 dpi: "31.75"
  295.  
  296. *ColorSepScreenProc ProcessYellow.90lpi.635dpi/90 lpi / 635 dpi: "
  297. {1 add 2 div 3 mul dup floor sub 2 mul 1 sub exch 
  298. 1 add 2 div 3 mul dup floor sub 2 mul 1 sub exch 
  299. abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1 
  300. sub }{dup mul exch dup mul add 1 exch sub }ifelse }"
  301. *End
  302.  
  303. *% For 75 lpi / 635 dpi =====================================================
  304.  
  305. *ColorSepScreenAngle ProcessBlack.75lpi.635dpi/75 lpi / 635 dpi: "45.0"
  306. *ColorSepScreenAngle CustomColor.75lpi.635dpi/75 lpi / 635 dpi: "45.0"
  307. *ColorSepScreenAngle ProcessCyan.75lpi.635dpi/75 lpi / 635 dpi: "71.5651"
  308. *ColorSepScreenAngle ProcessMagenta.75lpi.635dpi/75 lpi / 635 dpi: "18.4349"
  309. *ColorSepScreenAngle ProcessYellow.75lpi.635dpi/75 lpi / 635 dpi: "0.0"
  310.  
  311. *ColorSepScreenFreq ProcessBlack.75lpi.635dpi/75 lpi / 635 dpi: "74.8355"
  312. *ColorSepScreenFreq CustomColor.75lpi.635dpi/75 lpi / 635 dpi: "74.8355"
  313. *ColorSepScreenFreq ProcessCyan.75lpi.635dpi/75 lpi / 635 dpi: "66.9349"
  314. *ColorSepScreenFreq ProcessMagenta.75lpi.635dpi/75 lpi / 635 dpi: "66.9349"
  315. *ColorSepScreenFreq ProcessYellow.75lpi.635dpi/75 lpi / 635 dpi: "70.5556"
  316.  
  317. *% For 128 lpi / 1270 dpi (7,7,4,11,11,4,11,0) ===============================
  318.  
  319. *ColorSepScreenAngle ProcessBlack.128lpi.1270dpi/128 lpi / 1270 dpi: "45.0"
  320. *ColorSepScreenAngle CustomColor.128lpi.1270dpi/128 lpi / 1270 dpi: "45.0"
  321. *ColorSepScreenAngle ProcessCyan.128lpi.1270dpi/128 lpi / 1270 dpi: "70.0169"
  322. *ColorSepScreenAngle ProcessMagenta.128lpi.1270dpi/128 lpi / 1270 dpi: "19.9831"
  323. *ColorSepScreenAngle ProcessYellow.128lpi.1270dpi/128 lpi / 1270 dpi: "0.0"
  324.  
  325. *ColorSepScreenFreq ProcessBlack.128lpi.1270dpi/128 lpi / 1270 dpi: "128.289"
  326. *ColorSepScreenFreq CustomColor.128lpi.1270dpi/128 lpi / 1270 dpi: "128.289"
  327. *ColorSepScreenFreq ProcessCyan.128lpi.1270dpi/128 lpi / 1270 dpi: "108.503"
  328. *ColorSepScreenFreq ProcessMagenta.128lpi.1270dpi/128 lpi / 1270 dpi: "108.503"
  329. *ColorSepScreenFreq ProcessYellow.128lpi.1270dpi/128 lpi / 1270 dpi: "115.455"
  330.  
  331. *% For 112 lpi / 1270 dpi ===================================================
  332.  
  333. *ColorSepScreenAngle ProcessBlack.112lpi.1270dpi/112 lpi / 1270 dpi: "45.0"
  334. *ColorSepScreenAngle CustomColor.112lpi.1270dpi/112 lpi / 1270 dpi: "45.0"
  335. *ColorSepScreenAngle ProcessCyan.112lpi.1270dpi/112 lpi / 1270 dpi: "71.5651"
  336. *ColorSepScreenAngle ProcessMagenta.112lpi.1270dpi/112 lpi / 1270 dpi: "18.4349"
  337. *ColorSepScreenAngle ProcessYellow.112lpi.1270dpi/112 lpi / 1270 dpi: "0.0"
  338.  
  339. *ColorSepScreenFreq ProcessBlack.112lpi.1270dpi/112 lpi / 1270 dpi: "112.253"
  340. *ColorSepScreenFreq CustomColor.112lpi.1270dpi/112 lpi / 1270 dpi: "112.253"
  341. *ColorSepScreenFreq ProcessCyan.112lpi.1270dpi/112 lpi / 1270 dpi: "100.402"
  342. *ColorSepScreenFreq ProcessMagenta.112lpi.1270dpi/112 lpi / 1270 dpi: "100.402"
  343. *ColorSepScreenFreq ProcessYellow.112lpi.1270dpi/112 lpi / 1270 dpi: "105.833"
  344.  
  345. *% For 90 lpi / 1270 dpi (10,10,4,12,12,4,40/3,0) ===========================
  346.  
  347. *ColorSepScreenAngle ProcessBlack.90lpi.1270dpi/90 lpi / 1270 dpi: "45.0"
  348. *ColorSepScreenAngle CustomColor.90lpi.1270dpi/90 lpi / 1270 dpi: "45.0"
  349. *ColorSepScreenAngle ProcessCyan.90lpi.1270dpi/90 lpi / 1270 dpi: "71.5651"
  350. *ColorSepScreenAngle ProcessMagenta.90lpi.1270dpi/90 lpi / 1270 dpi: "18.4349"
  351. *ColorSepScreenAngle ProcessYellow.90lpi.1270dpi/90 lpi / 1270 dpi: "0.0"
  352.  
  353. *ColorSepScreenFreq ProcessBlack.90lpi.1270dpi/90 lpi / 1270 dpi: "89.8026"
  354. *ColorSepScreenFreq CustomColor.90lpi.1270dpi/90 lpi / 1270 dpi: "89.8026"
  355. *ColorSepScreenFreq ProcessCyan.90lpi.1270dpi/90 lpi / 1270 dpi: "100.402"
  356. *ColorSepScreenFreq ProcessMagenta.90lpi.1270dpi/90 lpi / 1270 dpi: "100.402"
  357. *ColorSepScreenFreq ProcessYellow.90lpi.1270dpi/90 lpi / 1270 dpi: "31.75"
  358.  
  359. *ColorSepScreenProc ProcessYellow.90lpi.1270dpi/90 lpi / 1270 dpi: "
  360. {1 add 2 div 3 mul dup floor sub 2 mul 1 sub exch 
  361. 1 add 2 div 3 mul dup floor sub 2 mul 1 sub exch 
  362. abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1 
  363. sub }{dup mul exch dup mul add 1 exch sub }ifelse }"
  364. *End
  365.  
  366. *% end of PPD file for Linotype
  367.